home *** CD-ROM | disk | FTP | other *** search
/ Amiga Magazin: Amiga-CD 1996 November & December / Amiga-CD 1996 #11-12.iso / aminet / 10_96 / lha-archiv / easyprint.lha / Easy_Print / Install < prev    next >
Text File  |  1996-07-05  |  6KB  |  172 lines
  1. ;
  2. ; Script di installazione per EasyPrint 2.0 (4 lug 1996)
  3. ;
  4.  
  5. ; Stringhe
  6.  
  7. (set @default-dest  "")
  8. (set @default-message "")
  9. (set lib-def-dest   "LIBS:")
  10. (set eprint-dest    "SYS:")
  11.  
  12. ; E' un Amiga 3.0?
  13. (if (= @language "italiano")
  14. (
  15.         (if (< (/ (getversion) 65536) 39) (abort "Devi avere il Kickstart 3.0 (o superiore) per usare\nEasyPrint."))
  16.  
  17.         (message
  18.                 (cat      "\n\n\nEasyPrint, script di installazione.\n"
  19.                           "Questa procedura installa EasyPrint sul vostro Amiga.\n\n"
  20.                           "(C) Copyright 1995-1996 Andrea Latina."
  21.                 ))
  22.  
  23.         ; Ask where to copy the library.
  24.  
  25.         (set lib-dest
  26.                 (askdir
  27.                         (prompt  "Dove desideri vengano copiate le librerie (le librerie verrano copiate solo se più recenti di quelle già installate)?")
  28.                         (help    "    Se usi una directory per le librerie create da terzi, adesso puoi specificarla.")
  29.                         (default lib-def-dest)
  30.                 )
  31.         )
  32.  
  33.         ; Copy the library.
  34.  
  35.         (copylib
  36.                 (prompt (cat "Copio la reqtools.library in " (tackon lib-dest "reqtools.library")))
  37.                 (help   @copylib-help)
  38.                 (source "libs/reqtools.library")
  39.                 (dest   lib-dest)
  40.                 (confirm)
  41.         )
  42.  
  43.         (copylib
  44.                 (prompt (cat "Copio la iff.library in " (tackon lib-dest "iff.library")))
  45.                 (help   @copylib-help)
  46.                 (source "libs/iff.library")
  47.                 (dest   lib-dest)
  48.                 (confirm)
  49.         )
  50.  
  51.         (set eprint-dest
  52.                 (askdir
  53.                         (prompt  "Dove desideri installare EasyPrint (verrà creato un nuovo cassetto chiamato 'EasyPrint')?")
  54.                         (help    "    Seleziona il cassetto in cui installare EastPrint.")
  55.                         (default eprint-dest)
  56.                 )
  57.         )
  58.  
  59.         (if (NOT (exists (tackon eprint-dest "EasyPrint")))
  60.             (makedir (tackon eprint-dest "EasyPrint")))
  61.  
  62.         (copyfiles
  63.             (prompt "Copio 'EasyPrint' in " eprint-dest "EasyPrint/...")
  64.             (source "EasyPrint/")
  65.             (dest   (tackon eprint-dest "EasyPrint"))
  66.             (all)
  67.         )
  68.  
  69.         (copyfiles
  70.             (prompt "Copio 'EasyPrint' in " eprint-dest "EasyPrint/...")
  71.             (source "EasyPrint.guide")
  72.             (dest   (tackon eprint-dest "EasyPrint"))
  73.         )
  74.  
  75.         (copyfiles
  76.             (prompt "Copio 'EasyPrint' in " eprint-dest "EasyPrint/...")
  77.             (source "EasyPrint_ITA.guide")
  78.             (dest   (tackon eprint-dest "EasyPrint"))
  79.         )
  80.  
  81.         (if (exists ("env:sys/def_drawer.info"))
  82.             (copyfiles
  83.                 (prompt "Copio 'EasyPrint' in " eprint-dest "EasyPrint/...")
  84.                 (source "env:sys/def_drawer.info")
  85.                 (dest   eprint-dest)
  86.                 (newname "EasyPrint.info")
  87.                 (noposition)
  88.                 (nogauge)
  89.             )
  90.         )
  91. )
  92. (
  93.         (if (< (/ (getversion) 65536) 39) (abort "EasyPrint need at least OS 3.0"))
  94.  
  95.         (message
  96.                 (cat      "\n\n\nEasyPrint, installation script.\n\n"
  97.                           "This script installs EasyPrint on your Amiga.\n\n"
  98.                           "(C) Copyright 1995-1996 by Andrea Latina\nAll rights reserved."
  99.                 )
  100.         )
  101.  
  102.         ; Ask where to copy the library.
  103.  
  104.         (set lib-dest
  105.                 (askdir
  106.                         (prompt  "Select directory where to install the libraries (copies the libraries using version checking).")
  107.                         (help    "    Copies the libraries using version checking; i.e., it only overwrites an existing library if the new library has a higher version/revision number.")
  108.                         (default lib-def-dest)
  109.                 )
  110.         )
  111.  
  112.         ; Copy the library.
  113.  
  114.         (copylib
  115.                 (prompt (cat "Copying reqtools.library to " lib-dest))
  116.                 (help   @copylib-help)
  117.                 (source "libs/reqtools.library")
  118.                 (dest   lib-dest)
  119.                 (confirm)
  120.         )
  121.  
  122.         (copylib
  123.                 (prompt (cat "Copying iff.library to " lib-dest ))
  124.                 (help   @copylib-help)
  125.                 (source "libs/iff.library")
  126.                 (dest   lib-dest)
  127.                 (confirm)
  128.         )
  129.  
  130.         (set eprint-dest
  131.                 (askdir
  132.                         (prompt  "Select directory where to install EasyPrint (a directory called `EasyPrint` will be created here).")
  133.                         (help    "    If you specify a path, a new directory called `EasyPrint` will be created in it. The program will be copied in this directory.")
  134.                         (default eprint-dest)                                                                                
  135.                 )
  136.         )
  137.  
  138.         (if (NOT (exists (tackon eprint-dest "EasyPrint")))
  139.             (makedir (tackon eprint-dest "EasyPrint")))
  140.  
  141.         (copyfiles
  142.             (prompt "Copying 'EasyPrint' to " eprint-dest "EasyPrint/...")
  143.             (source "EasyPrint/")
  144.             (dest   (tackon eprint-dest "EasyPrint"))
  145.             (all)
  146.         )
  147.  
  148.         (copyfiles
  149.             (prompt "Copying 'EasyPrint' to " eprint-dest "EasyPrint/...")
  150.             (source "EasyPrint.guide")
  151.             (dest   (tackon eprint-dest "EasyPrint"))
  152.         )
  153.  
  154.         (copyfiles
  155.             (prompt "Copying 'EasyPrint' to " eprint-dest "EasyPrint/...")
  156.             (source "EasyPrint_ITA.guide")
  157.             (dest   (tackon eprint-dest "EasyPrint"))
  158.         )
  159.  
  160.         (if (exists ("env:sys/def_drawer.info"))
  161.             (copyfiles
  162.                 (prompt "Copying 'EasyPrint' to " eprint-dest "EasyPrint/...")
  163.                 (source "env:sys/def_drawer.info")
  164.                 (dest   eprint-dest)
  165.                 (newname "EasyPrint.info")
  166.                 (noposition)
  167.                 (nogauge)
  168.             )
  169.         )
  170. )
  171. ) ; if
  172.